home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2000 January / Macworld (2000-01).dmg / Updaters / DirXtra HTML204 / xtradoc.dir / 00008_Script_Movie Script < prev    next >
Text File  |  1999-02-22  |  1KB  |  37 lines
  1. on startmovie
  2.   -- declare the globals to setup the field values
  3.   global ghtmlnormfont, ghtmlheadfont, ghtmlttfont, ghtmlfontsize, ghtmlpath
  4.   global ghtmllinkred, ghtmllinkgreen, ghtmllinkblue, ghtmlsmoothness, ghtmlmargin
  5.   global gmac, gsep, ghandcursor
  6.   
  7.   -- setup the pointing hand cursor for link-rollover
  8.   set ghandcursor = [member "hand", member "handmask" ]
  9.   
  10.   -- setup platform specific globals
  11.   if the machinetype = 256 then -- is Windows
  12.     set gmac = 0
  13.     set gsep = "\"
  14.   else -- is Mac
  15.     set gmac = 1
  16.     set gsep = ":"
  17.   end if
  18.   
  19.   -- setup intial values and global variables
  20.   htmlstartmovie
  21.   
  22.   -- setup the field values
  23.   set the text of field "normfont" = ghtmlnormfont
  24.   set the text of field "ttfont" = ghtmlttfont
  25.   set the text of field "headfont" = ghtmlheadfont
  26.   set the text of field "fontsize" = string(ghtmlfontsize)
  27.   
  28.   set the text of field "red" = string(ghtmllinkred)
  29.   set the text of field "green" = string(ghtmllinkgreen)
  30.   set the text of field "blue" = string(ghtmllinkblue)
  31.   
  32.   set the text of field "smooth" = string(ghtmlsmoothness)
  33.   set the text of field "margin" = string(ghtmlmargin)
  34.   
  35.   set ghtmlpath = the moviepath -- the directory of the html files
  36. end
  37.